home *** CD-ROM | disk | FTP | other *** search
/ Developer Source 4 / developer source - volume 4.iso / parad / jul94 / srfig20b.gif < prev   
Graphics Interchange Format  |  1996-07-02  |  20.3 KB  |  484x383  |  4-bit (13 colors)
   ocr: - SOLIVIEW-SOLIablevieweiromiExecutesoLTable - - nethod ExecutesoLTable(uar Sqlstatement String, var AliasNameField string, var Password String, var tbinane String) var SQLDB Database tbl Table tenp String endvar if 1SA551gned(Allashanefield) then if setAliasPasswora(Allashamefield,Password) then SOLDB.open(AliasNanefield) else errorsnowicou.ont set password for : + Aliashanefield) endif (0l.attacn(toinane) if tbl.1sTable0) then cbl.delete) nessage(tDinane + : deleted ") endif if not executesoLstring(soLDB.selstatement,tbinane) then errorsnowesul Connand Failed!" Sqlstatement) return endif els ...